From 094aa10b4ccf6666c0f73823aa16237d1bc94220 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 26 Jan 2001 11:27:21 +0000 Subject: [PATCH] (gud-perldb-massage-args): Avoid nreverse'ing a list part of which is a constant. --- lisp/gud.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gud.el b/lisp/gud.el index 9e9650931df..4b2b621ee12 100644 --- a/lisp/gud.el +++ b/lisp/gud.el @@ -1182,7 +1182,7 @@ directories if your program contains sources from more than one directory." ;; "-d" in inserted as the first switch, and "-emacs" is inserted where ;; it will be $ARGV[0] (see perl5db.pl). (defun gud-perldb-massage-args (file args) - (let* ((new-args '("-d")) + (let* ((new-args (list "-d")) (seen-e nil) (shift (lambda () (setq new-args (cons (car args) new-args)) -- 2.30.2